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PLEASE  NOTE.  The  Federal  Compiler  Testing  Center  may  make  full  and  free  public 
disclosure  of  the  Validation  Summary  Report  (VSR)  In  accordance  with  the 
"Freedom  of  Information  Act"  (5  U.S.C.  #552).  The  results  of  this  validation 
are  only  for  the  purpose  of  satisfying  United  States  Government  requirements, 
and  apply  only  to  the  Computer  System,  Operating  System  release,  and  compiler 
version  Identified  In  the  VSR.  The  COBOL  Compiler  Validation  System  Is  used  to 
determine.  Insofar  as  Is  practical,  the  degree  to  which  the  subject  compiler 
conforms  to  the  Federal  COBOL  Standard.  Thus,  the  VSR  Is  necessarily 
discretionary  and  Judgmental.  The  United  States  Government  does  not  represent 
or  warrant  that  the  statements,  or  any  one  of  them,  set  forth  In  the  VSR  are 
accurate  or  complete.  The  VSR  la  not  meant  to  be  used  for  the  purpose  of 
publicizing  the  findings  summarized  therein. 


For  Information  concerning  this  compiler  you  can  contact  the  vendor's  designated 
representative  named  below: 

Mr.  Robert  M.  Klburz 
Data  General  Corporation 
Route  9 

Weatboro,  Massachusetts  01581 
Phone:  617-366-8911 
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1.  SECTION  1.  INTRODUCTION 

1.1  Purpose  of  the  Validation  Sununary  Report 

The  purpose  of  the  Validation  Sununary  Report  (VSR)  is  to  identify  individual 
COBOL  language  elements  whose  implementation  does  not  conform  to  American 
National  Standard  Programming  Language  COBOL,  X3. 23-1974,  and  to  Federal  Stan- 
dard COBOL  as  adopted  from  the  American  National  Standard  by  Federal  Information 
Processing  Standard  21-1  (FIPS  PUB  21-1). 

1.2  Preparation  of  the  VSR 

The  Validation  Summary  Report  is  prepared  by  analyzing  the  results  of  running 
the  COBOL  Compiler  Validation  System  (CCVS).  The  COBOL  Compiler  Validation 
System  consists  of  audit  routines  containing  features  of  Federal  Standard  COBOL, 
their  related  data,  and  an  executive  routine  (VP-routine)  which  prepares  the 
audit  routines  for  compilation.  Each  audit  routine  is  a COBOL  program  which 
includes  many  testa  and  supporting  procedures  indicating  the  result  of  the 
tests. 

The  testing  of  a compiler  in  a particular  hardware/operating  system  environment 
is  accomplished  by  compiling  and  executing  each  audit  routine.  The  report  pro- 
duced by  each  routine  tells  whether  the  compiler  passed  or  failed  the  tests  in 
the  routine.  If  the  compiler  rejects  some  language  elements  by  terminating 
compilation,  giving  fatal  diagnostic  messages,  or  terminating  execution  abnor- 
mally, then  the  test  containing  the  code  the  compiler  was  unable  to  process  is 
deleted  and  the  audit  routine  compilation  and  execution  repeated. 

The  compilation  listings  and  the  output  reports  of  the  audit  routines  constitute 
the  raw  data  from  which  the  members  of  the  Federal  Compiler  Testing  Center 
produce  a Validation  Summary  Report. 

1.3  Organization  of  the  VSR 

The  Validation  Summary  Report  is  made  up  of  several  sections  the  contents  of 
which  are  described  below. 

a.  Section  2 summarizes  the  results  of  the  compilation  and  execution  of 

the  programs  comprising  the  COBOL  Compiler  Validation  System.  Section  2 is 
subdivided  into  a subsection  representing  each  level  of  each  module  defined  in 
American  National  Standard  Programming  Language  COBOL,  X3. 23-1974.  Each 

subsection  contains  a list  of  all  of  the  language  elements  which  must  be 

implemented  in  order  to  claim  support  of  that  level/module.  The  list  of 
language  elements  will  be  annotated  to  Include  a description  of  both  syntax  and 
semantic  errors  detected  during  the  validation. 

b.  Section  3 - FIPS  PUB  21-1  defines  four  Federal  levels  of  the  COBOL 

Standard.  Section  3*1  of  the  VSR  lists  the  discrepancies  described  in  Section  2 
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by  the  Federal  level  In  which  the  problem  occurs.  Section  3.2  lists  discrepan- 
cies with  regard  to  the  Flaggiitg  requirement  defined  in  Federal  Standard  COBOL 
(the  FIPS  FLACiCER).  Section  3-3  lists  discrepancies  for  the  Report  Writer 
Module,  which  is  not  a part  of  Federal  Standard  COBOL  but  is  contained  in 

x?. 23*1974. 


c.  Section  4 contains  information  which  describes  the  software  environment 
in  which  the  compiler  was  tested.  This  includes  the  name  and  version  of  the 
operating  system;  the  implementor-names  which  were  used  in  the  Environment 
Division  of  the  programs  comprising  the  CCVS;  the  options  used  with  the  com- 
piler; and  if  applicable,  information  regarding  the  use  of  compiler  optimization 
features . 

d.  Section  S contains  the  results  of  the  ASCII  validation.  The  purpose  of 
these  tests  is  to  ascertain  whether  magnetic  tapes  written  in  ASCII  code  and 
with  ANSI  standard  labels,  and  card  decks  with  ASCII  code,  can  be  transported 
between  the  system  being  validated  and  a foreign  computer  system. 

e.  Appendix  A is  the  Validation  Summary  Working  Docinnent,  a working  paper 
resulting  from  the  compilation  and  execution  of  the  CCVS,  and  from  which  the  VSR 
is  derived.  Not  all  VSR's  will  contain  this  appendix. 

1.4  Abstract  Covering  Compliance  to  ANS  COBOL 

Definition  of  an  Implementation  of  American  National  Standard  Programming 
Language  COBOL  (excerpts  from  X3. 23-1974,  Chapter  1,  Section  1.5). 

An  implementation  is  defined  to  meet  the  requirements  of  the  American  National 
Standard  COBOL  specification  if  that  implementation  includes  a fully  implemented 
specified  level  of  each  of  the  functional  processing  modules  and  of  the  Nucleus 
as  defined  in  this  Standard.  It  follows  from  this  that,  in  order  to  meet  the 
requirements  of  this  Standard,  an  implementation  must: 

a.  Not  require  the  inclusion  of  substitute  or  additional  language  elements 
in  the  source  program,  in  order  to  accomplish  any  part  of  the  function  of  any  of 
the  standard  language  elements. 

b.  Accept  all  standard  language  elements  contained  in  a given  level  of  a 
module  which  la  specified  as  being  included  in  the  Implementation,  except  as 
specifically  exempted  (as  pertaining  to  specific  hardware  components  for  which 
support  is  not  claimed).  See  "Elements  that  Pertain  to  Specific  Hardware 
Components"  below. 

These  points  are  of  particular  pertinence  in  two  areas: 

(1)  There  are  throughout  the  American  National  Standard  COBOL 
specification  certain  language  elements  whose  syntax,  or  effect,  is  specified  to 
be,  in  part,  implementor-defined.  While  the  implementor  specifies  the  con- 
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atralnts  on  that  portion  of  each  element's  syntax  or  rules  that  is  indicated 
cated  in  this  Standard  to  be  implementor-defined,  svjch  constraints  may  not 
include  any  requirement  for  the  inclusion  in  the  source  progr«m  of  substitute  or 
additional  language  elements. 

(2)  Vfhen  a fvmction  is  provided  outside  the  sovjrce  program  that 
accomplishes  a fvmction  specified  by  any  particular  standard  COBOL  element,  then 
the  implementation  must  not  require,  except  for  Environment  Division  elements, 
the  specification  of  that  external  function  in  place  of  or  in  addition  to  that 
standard  language  element; 

The  followitig  qualifications  apply  to  the  American  National  Standard  COBOL 
specification; 

a.  There  are  certain  language  elements  which  pertain  to  specific  types  of 
hardware  components.  In  order  for  an  Implementation  to  meet  the  requirements  of 
this  standard,  the  implementor  must  specify  the  minimum  hardware  configuration 
required  for  that  implementation  and  the  hardware  components  that  it  supports. 
Further,  when  support  is  thvjs  claimed  for  a specific  hardware  component,  all 
standard  langviage  elements  that  pertain  to  that  component  must  be  implemented  if 
the  module  in  which  they  appear  is  included  in  the  implementation.  Langviage 
elements  that  pertain  to  specific  hardware  components  for  which  support  is  not 
claimed,  need  not  be  implemented.  However,  the  absence  of  svich  elements  from  an 
Implementation  of  American  National  Standard  COBOL  must  be  specified. 

b.  An  implementation  of  American  National  Standard  COBOL  may  inclvide  the 
ENTER  statement  or  not,  at  the  option  of  the  Implementor. 

c.  An  implementation  that  inclvides,  in  addition  to  a specified  level  of 
each  of  the  fvmctional  processing  modules  and  of  the  Nvicleus,  elements  or 
fvinctlons  that  either  are  not  defined  in  the  American  National  Standard  COBOL 
specification  or  are  defined  in  a given  level  of  a standard  module  not  otherwise 
included  in  the  implementation,  meets  the  requirements  of  this  Standard.  This 
is  trvie  even  thovigh  it  may  imply  the  extension  of  the  list  of  reserved  words  by 
the  implementor,  and  prevent  proper  compilation  of  some  programs  that  meet  the 
requirements  of  this  Standard.  The  implementor  mvist  specify  any  optional 
langviage  (language  not  defined  in  a specified  level  but  defined  elsewhere  In  the 
Standard)  or  extensions  (langviage  elements  or  fvinctlons  not  defined  in  this 
Standard)  that  are  inclvided  in  the  implementation. 

d.  In  general,  the  American  National  Standard  COBOL  specification 
specifies  no  upper  limit  on  svich  things  as  the  nvimber  of  statements  in  a pro- 
gram, the  nvimber  of  operands  permitted  in  certain  statements,  etc.  It  is 
recognized  that  these  limits  will  vary  from  one  implementation  of  American 
National  Standard  COBOL  to  another  and  may  prevent  the  proper  compilation  of 
some  programs  that  meet  the  requirements  of  this  standard. 
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IMPLEMENTOR-DEFINED  LANGUAGE  SPECIFICATIONS 


The  language  elements  in  the  following  lists  depend  on  implementor  definitions 
to  complete  the  specificaton  of  the  syntax  or  rules  for  the  elements. 


"he  elements  whose  syntax  is  partly  implementor-defined  are: 


Element 


Implementor-Defined  Aspect 


SOURCE-COMPUTER  paragraph 
OBJECT-COMPUTER  paragraph 
MEMORY  SIZE  clause 
alphabet-name 

SPECIAL-NAMES  paragraph 
ASSIGN  clause 


computer-name 

computer-name 

integer 

implementor-name;  whether  imple- 
mentor-names are  provided. 

implementor -name 

implementor-name 


VALUE  OF  clause  implementor-name;  whether  imple- 

mentor-names are  provided. 

RERUN  clause  implementor-name  and  the  form; 

the  implementor  provides  at 
least  one  of  seven  specified 
forms. 


CALL  and  CANCEL  statements  relationship  between  operand  and 

the  referenced  program. 

COPY  statement  relationship  between  library-name 

textname,  aind  the  library. 


ENTER  statement 


language-name 


Margin  R 


The  location. 


Area  B 


The  number 
tlons. 


of  character  posi- 


Qualiflcatlon 


The  number  of  qualifiers;  at 
least  five  must  be  supported. 
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Element 


alphabet-name 


implementor-name  switches 


USAGE  IS  COMPUTATIONAL 
clause 

USAGE  IS  INDEX  clause 


SYNCHRONIZED  clause 

ACCEPT  statement 

DISPLAY  statement 

Nianeric  test 

Comparison  of  nonnumeric  items 

Arithmetic  expressions 


Implementor-Defined  Aspect 


The  correspondence  between  native 
and  foreign  character  sets. 

Vfhether  setting  can  change  during 
execution. 

Representation  and  whether  auto- 
matic alignment  occurs. 

Representation  and  whether  auto- 
matic alignment  occurs. 

Whether  implicit  FILLER  positions 
are  generated;  their  effect  on 
the  size  of  group  items  and 
redefining  items. 

Maximiun  size  of  one  transfer  of 
data  in  Level  1 Nucleus. 

Maximiun  size  of  one  transfer  of 
data  in  Level  1 Nucleus. 

Representation  of  valid  sign  in 
the  absence  of  the  SIGN  IS 
SEPARATE  clause. 

Collating  sequence,  where  NATIVE 
or  implementor-name  collating 
sequence  is  implicitly  or 
explicitly  specified. 


Niunber  of  places  carried 
intermediate  results. 


for 
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Elements  That  Pertain  to  Specific  Hardware  Components 

The  standard  language  elements  in  the  list  that  follows  pertain  to  specific 
types  of  hardware  components.  These  language  elements  must  be  implemented  in  an 
implementation  of  American  National  Standard  COBOL  when  support  is  claimed,  by 
the  Implementor,  for  the  specific  types  of  hardware  components  to  which  they 
pertain,  and  the  module  in  which  they  are  defined  is  Included  in  that 
implementation . 

Element  Hardware  Component 


CODE-SET  clause 

MULTIPLE  FILE  TAPE  clause 
CLOSE , . . REEL/UNIT  statement 
CLOSE... NO  REWIND  statement 
OPEN . . . REVERSED  statement 


OPEN... NO  REWIND  statement 

0PEN...I-0  statement 
(Sequential  I-O  only) 

OPEN  EXTEND  statement 

I REWRITE  statement 

I (Sequential  I-O  only) 

SEND... BEFORE/ AFTER 
ADVANCING  statement 

USE... I-O  (Sequential 
I-O  only) 


WRI’^E...BEFORE/AFTER 

ADVANCING 


Device  capable  of  supporting  the 
specified  code. 

Reel 

Reel  or  mass  storage 

Reel  or  mass  storage 

Reel  with  the  capability  of 
making  records  available  in  the 
reversed  order;  mass-storage 
with  the  capability  of  making 
records  available  in  the  re- 
versed order. 

Reel  or  mass  storage 

Mass  storage 


Reel  or  mass  storage 
Mass  storage 


Devices  capable  of  vertical  posi- 
tioning; devices  capable  of  ac- 
tion based  on  mnemonic-names. 

I 

Mass  storage 


Devices  capable  of  vertical  posi- 
tioning; devices  capable  of  ac- 
tion based  on  mnemonic-name. 


t ^ 
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1.5  The  Federal  COBOL  Standard 

The  COBOL  compiler  validation  results  enclosed  in  this  document  reflect  the 
degree  t''  which  the  subject  COBOL  compiler  Implements  the  Federal  COBOL 
Standard.  The  Federal  COBOL  Standard  is  essentially  the  same  as  the  American 
National  Standard  Programming  Language  COBOL,  X3. 23-1974,  with  two  exceptions: 


The  Federal  COBOL  Standard  defines  4 levels  and  the  ANSI  Standard 
defines  only  the  minimum  COBOL  Implementation  and  the  full  standard. 

Low  and  High  levels  of  the  Federal  COBOL  Standard  (see  1.5.1) 
correspond  to  the  above  two  ANSI  levels  (minus  the  Report  Writer 
module).  Two  additional  levels,  low-intermediate  and  high-intermedi- 
ate have  been  included  in  the  Federal  Standard  between  the  highest 
and  lowest  subsets.  These  additional  levels  accommodate  hardware 
which  cannot  support  the  full  standard,  but  which  is  capable  of 
implementing  more  than  the  minimum  standard. 

The  Federal  COBOL  Standard  states  that  the  Report  Writer  Module  is 
not  mandatory  In  any  Federal  level,  but  that  the  specifications 
contained  in  X3. 23- 1974  should  be  used  to  the  extent  practical, 
consistent  with  requirements. 

The  Federal  COBOL  Standard  requires  that  a compiler  contain  as  a minimum  the 
elements  specified  in  at  least  one  of  the  Federal  levels.  No  restrictions  are 
imposed  on  the  inclusion  of  selected  features  from  higher  levels  or  even  unique 
vendor  extensions.  Compatibility  amoung  various  implementations  of  a given 
level  containing  additional  features  must  be  controlled  by  management  imposed 
standards  and  restrictions. 


1.5.1  Federal  Standard  COBOL  Levels 


a.  Federal  Standard  COBOL  specifications  are  the  language  specifications 
contained  in  American  National  Standard  Programming  Language  COBOL,  X3. 23- 1974. 
For  purposes  of  the  Federal  Standard,  the  modules  defined  in  X3. 23-1974  are 
combined  into  four  levels.  Not  all  computers  are  large  enovigh  to  accommodate  a 
COBOL  compiler  containing  the  full  ANSI  Standard.  Therefore,  the  Federal 
Government  requires  that  all  compilers  acquired  by  its  agencies  contain  as  a 
minimum  one  of  the  four  Federal  levels,  depending  on  machine  size,  configuration 
and  user  needs.  The  knowledge  that  all  computers  will  support  at  least  one  of 
these  four  subsets  simplifies  the  task  of  developing  machine-independent  COBOL 
programs . 


b.  The  four  levels  of  Federal  Standard  COBOL  are  identified  as:  Low, 
Low-Intermediate,  High-Intermediate,  and  High.  Each  Federal  Standard  COBOL 
level  la  composed  of  either  the  high  or  low  levels  of  the  nucleus  and  ten  of  the 
eleven  Functional  Processing  Modules  (FPMs)  defined  in  X?. 23- 1974.  The  four 
Federal  Standard  COBOL  levels  are  reflected  in  the  following  table.  The  numbers 
In  the  table  refer  to  the  level  within  the  FPM  or  nucleus  as  designated  in 
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X3. 23-1974, 
omitted. 

and  a dash 

In  the  table 

denotes  that  the  corresponding  FPM  Is 

Low 

High 

Inter- 

Inter- 

Low 

mediate 

mediate  High 

NUCLEUS 

1 

1 

2 

2 

FPMs 

TABLE  HANDLING 

1 

1 

2 

2 

SEQUENTIAL  I-O 

1 

1 

2 

2 

RELATIVE  I-O 

- 

1 

2 

2 

INDEXED  I-O 

• 

- 

_ 

2 

SORT-MERGE 

• 

- 

1 

2 

REPORT  WRITER 

- 

- 

- 

- 

SEGMENTATION 

• 

1 

1 

2 

LIBRARY 

• 

1 

1 

2 

DEBUG 

- 

1 

2 

2 

INTER-PROGRAM 

COMMUNICATION 

• 

1 

2 

2 

COMMUNICATION 

• 

2 

2 

1.5.2  Conformance  to  Federal  Standard  COBOL 


A compiler  Implemented  in  conformance  to  Federal  Standard  COBOL  must  meet  at 
least  the  following  requirements. 

a.  The  Implementation  must  Include  all  of  the  language  elements  of  at 
least  one  of  the  levels  of  Federal  Standard  COBOL. 

b.  The  Implementation  must  meet  all  of  the  requirements  defined  In 
American  National  Standard  COBOL,  X3.23-1974t  Section  I,  paragraph  1.5,  Defini- 
tion of  An  Implementation  of  American  National  Standard  COBOL  which  is  provided 
in  section  1.4  of  this  VSR. 

c.  The  Implementation  must  provide  a facility  for  the  user  to  optionally 
specify  a level  of  Federal  Standard  COBOL  for  monitoring  his  source  program  at 
compile  time.  The  monitoring  will  be  an  analysis  of  the  syntax  used  in  a source 
program  against  the  syntax  Included  In  the  specified  level  of  Federal  Standard 
COBOL.  Any  syntax  used  In  the  source  program  that  does  not  conform  to  that 
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allowed  by  the  uaer  aelected  level  of  Federal  Standard  COBOL  will  be  diagnosed. 
The  syntax  diagnosed  as  not  conforming  to  the  specified  level  will  be  Identified 
to  the  user  through  a diagnostic  message  on  the  source  program  listing.  The 
diagnostic  message  will  contain,  at  least:  (1)  The  Identification  of  the  source 
program  line  number  In  which  the  nonconforming  syntax  occurs,  (2)  the 
identification  of  the  level  of  Federal  Standard  COP^'L.  that  supports  the  syntax 
or  that  the  syntax  is  nonstandard  COBOL. 

1.6  Use  of  the  VSR 

The  Federal  Compiler  Testing  Center  may  make  full  and  free  public  disclosure  of 
the  Validation  Summary  Report  (VSR)  In  accordance  with  the  "Freedom  of 
Information  Act"  (5  U.S.C.  #552).  The  results  of  the  validation  are  only  for 
the  purpose  of  satisfying  United  States  Government  requirements,  and  apply  only 
to  the  computer  system,  operating  system  release,  and  compiler  version 
Identified  In  the  VSR. 

The  COBOL  Compiler  Validation  System  is  used  to  determine.  Insofar  as  Is 
practical,  the  degree  to  which  the  subject  compiler  conforms  to  the  COBOL 
Standard.  Thus,  the  VSR  is  necessarily  discretionary  and  Judgmental.  The 
United  States  Government  does  not  represent  or  warrant  that  the  statements,  or 
any  one  of  them,  set  forth  in  the  VSR  are  accurate  or  complete.  The  VSR  Is  not 
meant  to  be  used  for  the  purpose  of  publicizing  the  findings  summarized  therein. 

1.7  Sources  of  Additional  Information 

FIPS  PUB  21-1  defines  the  Federal  COBOL  Language  Standard.  This  publication  is 
available  from  the  Office  of  ADP  Standards  Management,  National  Bureau  of 
Standards,  Washington,  D.  C.,  202311. 

The  detailed  COBOL  language  specifications  are  given  In  the  publication 
"American  National  Standard  Programming  Language  COBOL,  X3. 23-1974",  available 
from  the  American  National  Standards  Institute,  1430  Broadway,  New  York,  New 
York  10018. 

An  explanation  of  the  COBOL  Compiler  Validation  System  is  contained  in  the  CCVS 
User's  Guide.  This  docinent  explains  how  to  run  the  compiler  validation  system. 
The  User's  Guide  and  a magnetic  tape  containing  a copy  of  the  CCVS  programs  are 
available  from  the  National  Technical  Information  Service,  Springfield, 
Virginia,  22151.  (Ordering  information  can  be  obtained  from  the  Federal 
Compiler  Testing  Center.) 

1.8  Requests  for  Interpretation 

Questions  regarding  this  VSR  or  the  CCVS  in  general  should  be  forwarded  to  the 
FCTC.  If  any  problem  cannot  be  adequately  resolved  throiigh  the  FCTC,  the 
request  for  Interpretation  will  be  forwarded  to  the  Federal  COBOL  Interpretation 
Committee  for  final  resolution. 


9 


CCVS7'I-VSR360 


INTRODUCTION 


A brochure  de.icrlbltig  the  validation  process  Including  the  procedures  for 
requesting  a validation  and  resolution  of  questions  Involving  Interpretation  of 
the  current  Federal  Standard  Is  available  from  the  Federal  Compiler  Testing 
Center,  Automated  Data  and  Telecommunications  Service  (CFT),  General  Services 
Administration,  Washington,  DC  20406. 

1.9  Modules  and  Language  Elements  Excluded  from  Testing 

During  an  official  validation,  certain  CCVS  tests  may  not  be  used,  and  certain 
facilities  provided  by  the  subject  compiler  may  not  be  tested. 

1.9.1  Federal  Standard  COBOL  Approved  Interpretations 

The  National  Bureau  of  Standards  published  In  the  Federal  Register  Vol . 41  No. 
179,  September  14,  1976,  an  approved  Interpretation  of  Federal  Standard  COBOL  as 
pertains  to  the  evaluation  of  arithmetic  expressions  In  the  COMPUTE  statements. 
This  Interpretation  states  that  "size  of  the  Intermediate  result  field  la 
Implementor-defined." 

Since  the  results  of  evaluating  arithmetic  expressions  are  not  predictable,  all 
COMPUTE  statements  and  IF  statements  containing  arithmetic  expressions  have  been 
removed  from  the  COBOL  Compiler  Validation  System. 

1.9.2  Report  Writer  Module 

FIPS  PUB  21-1  excludes  the  Report  Writer  Module  from  the  Federal  COBOL  Standard. 
However,  the  Report  Writer  Module  la  still  tested  during  a validation  If  support 
for  that  module  la  claimed  by  the  compiler  vendor. 

1.9.3  Communication  Module 

Although  it  Is  part  of  Federal  Standard  COBOL  as  defined  by  FIPS  PUB  21-1,  the 
Communication  Module  Is  not  currently  tested  In  the  course  of  an  official  vali- 
dation for  two  specific  reasons.  First,  a large  volume  of  requests  for  Inter- 
pretation on  this  module  have  been  submitted  to  the  cognizant  ANSI  committee 
(X3J4)  for  resolution.  Secondly,  facilities  for  testing  were  Insufficient  to 
determine  the  validity  of  the  Communication  Module  test  programs  during  the 
development  of  CCVS74. 

1.9.4  Vendor  Omissions  or  Extensions 

Language  elements  are  not  tested  which  have  been  legitimately  omitted  from  the 
Implementation  by  the  Implementor  (refer  to  1.4).  Additionally,  no  Implementor 
extensions  to  the  standard  COBOL  language  are  tested  In  any  way. 
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1 . 10  Timeliness  of  the  Validation  Summary  Reports 

The  timeliness  of  the  Validation  Summary  Report  is  Important.  Compilers 
and  their  related  operating  system  software  are  modified  several  times  a year. 
The  Compiler  Validation  System  used  to  validate  compilers  is  also  updated  during 
the  life  of  the  system.  Therefore  to  ensure  that  the  latest  version  of  both  the 
vendor's  compiler  and  the  Validation  System  are  the  latest  officially  released 
versions,  check  with  the: 

Director 

Federal  Compiler  Testing  Center 

Automated  Data  and  Telecommunications  Service  (CFT) 

General  Services  Administration 
Washington,  DC  20406 
(703)  557-7806 

Please  use  the  Validation  Summary  Report  number  of  this  report  when 
corresponding  with  the  Testing  Center. 
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2.  SECTION  2.  DETAILED  EVALUATION  OF  ERRORS. 


This  section  summarizes  the  results  of  the  compilation  and  execution  of  the 
programs  comprising  the  COBOL  Compiler  Validation  System  (CCVS).  The  version  of 
the  CCVS  used  during  this  validation  Is  shown  Inside  the  front  cover  of  the  VSR. 

Section  2 Is  made  up  of  a variable  number  of  subsections.  The  number  of  sub- 
sections Is  dependent  on  the  Level  of  Federal  COBOL  being  validated.  There  will 
be  a subsection  for  each  level  of  each  module  which  Is  validated.  If  the  high 
level  of  a module  Is  validated  then  there  will  be  two  subsections  for  that 
module;  one  for  the  low  level  and  one  for  the  high  level. 

A validation  of  the  low  level  of  Federal  Standard  COBOL  would  result  in  three 
subsections  being  present.  One  for  Nucleus  level  1,  one  for  Sequential  I-O 
level  1,  and  one  for  Table  Handlltig  level  1. 

Each  error  or  deviation  noted  In  this  section  makes  reference  to  a program  or 
functional  COBOL  modvile.  If  additional  information  is  required  or  is  available 
it  will  be  contained  in  the  optional  Appendix  A.  If  no  further  information  is 
necessary  then  Appendix  A will  not  be  present. 

Each  program  in  the  COBOL  Compiler  Validation  System  is  identified  by  a 5- 
character  program  name.  The  name  associates  the  routine  with  the  functional 
processing  module  and  level  of  American  National  Standard  Programming  Language 
COBOL  tested  within  the  program. 

For  the  audit  routines  which  are  not  flagging  routines,  a five  character  name  Is 
used  which  has  the  general  format  XXNMM.  The  first  two  characters  are 
alphabetic  and  identify  the  functional  module  tested  by  the  program.  The 
permlssable  values  are: 

NC  - Nucleus 
TH  - Table  Handling 
SQ  - Sequential  I-O 
RL  - Relative  I-O 
IX  - Indexed  I-O 
ST  - Sort -Merge 
RW  - Report  Writer 
SG  - Segmentation 
LB  - Library 
DB  - Debug 

IC  - Inter-Program  Communication 
CM  - Communication 

The  third  character  of  the  audit  routine  name  Is  either  a 1 or  2,  and  identifies 
the  level  of  the  functional  module  being  tested.  Each  module  and  level  is 
represented  by  several  programs.  The  fourth  and  fifth  characters  of  the  program 
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name  are  sequence  rnjiabers  for  programs  which  test  features  in  the  same  level  of 
the  same  functional  processing  module. 

As  an  example,  the  program  name  NC210  Is  the  tenth  program  In  the  series  of 
routines  which  test  the  second  level  of  the  Nucleus  module. 

For  the  audit  routines  which  are  used  to  validate  the  flagging  requirement  of 
Federal  Standard  COBOL  (1.5.2.c),  a five  character  program  name  Is  used  which 
has  the  format  XXYZN.  The  first  two  characters  XX  identify  the  functional  COBOL 
module  being  tested  by  the  program  and  the  permissible  values  are  the  same  as 
noted  above.  The  third  character  Y Is  the  character  H and  Identifies  the 
program  as  one  of  a series  which  is  used  for  testing  compiler  flagging.  The 
fourth  character  Z Is  the  character  2,  3 or  H and  Identifies  the  highest  Federal 
level  of  the  COBOL  language  needed  to  support  all  language  elements  used  In  the 
program.  The  characters  2,  3 and  M represent  the  Low-Intermediate,  High-Inter- 
mediate and  High  Levels  respectively  of  Federal  Standard  COBOL.  The  fifth  char- 
acter N is  a number  1 through  9 which  gives  a unique  name  to  each  program  con- 
taining features  within  the  same  fiuictlonal  processing  module  and  Federal  COBOL 
level . 

As  an  example,  the  program  name  LB421  Is  the  first  program  of  a set  and  the 
COBOL  elements  used  In  the  program  are  available  at  the  Low-Intermediate  and 
higher  levels  of  Federal  Standard  COBOL.  Also,  the  program  Is  used  In  testing 
compiler  flagging  for  the  Library  Module. 

Description  of  Section  2. 

Each  error/deviation  Is  noted  by  number  In  the  left  hand  margin  opposite  the 
language  element  in  question.  This  number  is  used  in  section  3 to  categorize 
errors  by  Federal  level  (See  1.5.1).  Inserted  directly  below  the  language 
element  is  a brief  description  of  the  error.  To  the  right  of  the  langvmge 
element  Is  a page  reference  to  X3. 23- 1974,  American  National  Standard 
Programming  Language  COBOL.  The  reference  enclosed  In  parenthesis  at  the  end  of 
the  description  is  to  the  appropriate  program  contained  in  the  Compiler 
Validation  System  which  gives  an  example  of  the  of  the  error/deviation  detected. 
If  the  suffix  to  the  program  name  is  zeros  (e.g.,  NCOOO)  then  the  error  was 
detected  in  the  supporting  dociunentatlon  provided  with  the  compiler. 

If  the  optional  Appendix  A is  present,  then  the  program  name  associated  with 
each  error  may  be  suffixed  with  additional  information.  For  example  an  A or  B 
following  the  name  represents  a syntax  or  semantic  error  respectively.  A number 
following  the  A or  B represent  the  error  tnimber  which  can  be  found  in  appendix 

A. 
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Example: 


2.1  Nucleus  Level  1 


2.1.9 


Operational  symbols:  S V P 


11-21 


• The  Picture  character  ’P'  is  not  supported 

• in  this  implementaion. 

• (NC101.A.2) 


\ 2.2  Sequential  I-O  Level  1 

t 

f 

I 2.1.9  represents  the  ninth  error  for  Nucleus  Level  1 

[ 11-21  represents  the  page  in  X3. 23- 197*1  where  the  language 

I element  is  defined 

[ • Boxes  the  description  of  the  error/deviation 


NC101.A.2  represents: 
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2.1  Nucleus  Level  1 


Language  Concepts  1-75 

Characters  used  for  words 1-76 

Of  If  ...f  9 
Af  Bf  ...f  Z 
- (hyphen  or  minus) 

Characters  used  for  punctuation 1-65 


" quotation  mark 
( left  parenthesis 
) right  parenthesis 
. period 
space 

= equal  sign 

Characters  used  in  editing 1-58 

B space 
0 zero 
■¥  plus 
- minus 
CR  credit 
DB  debit 

Z zero  suppress 
• check  protect 
$ currency  sign 
f comma 
. period 
/ stroke 


Separators I-75 

The  separators,  semicolon  and  comma,  are  not 

allowed II- 1 

Character-strings  I-76 

COBOL  words I-76 

Not  more  than  30  characters 

User-defined  words 1-76 

data-nane 

Must  begin  with  an  alphabetic  character  ....  II- i 

Must  be  unique;  may  not  be  qualified II- 1 


level -number 

mnemonic-name 

paragraph-name 

program-name 

routine-name 

section-name 


System-names  1-78 

computer-name 

implementor-name 

language-name 

Reserved  words I-79 
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Key  words 
Optional  words 

Figurative  constants 1-80 

ZERO 

SPACE 

HIGH-VALUE 

LOH-VALUE 

QUOTE 


Special-character  words  1-80 

Literals 1-80 


Nonnumeric  literals  have  lengths  from  1 
through  120  characters 

Numeric  literals  have  lengths  from  1 through 


18  digits 

PICTURE  character-strings  1-82 

Comment-entries  1-82 

Reference  Format 1-105 

Sequence  number  1-105 

Area  A 1-105 

Division  header  1-106 

Section  header 1-106 

Paragraph  header 1-107 

Data  Division  entries  1-107 

Area  B 1-105 

Paragraphs 1-107 

Data  Division  entries  1-107 

Continuation  of  lines  1-106 

Only  nonnumeric  literals  may  be  continued  II-1 

Comment  lines  1-108 

Asterisk  (•)  comment  lines 
Stroke  (/)  comment  line 

Identification  Division 1-9** 

The  PROGRAM-ID  paragraph II-3 

The  AUTHOR  paragraph II-2 

The  INSTALLATION  paragraph II-2 

The  DATE-WRITTEN  paragraph II-2 

The  SECURITY  paragraph II-2 

Environment  Division 1-95 

The  SOURCE-COMPUTER  paragraph  II-5 

computer-name 

The  OBJECT-COMPUTER  paragraph  II-6 

computer-name 
MEMORY  SIZE  clause 
PROGRAM  COLLATING  SEQUENCE  clause 
The  SPECIAL-NAMES  paragraph  II-8 


I 


4 
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Ifflplementor-name  IS  mnemonic-name 
Implementor-name  IS  mnemonic-name  series 
ON  STATUS 
OFF  STATUS 

alphabet-name  clause 
CURRENCY  SIGN  clause 
DECIMAL-POINT  clause 


Data  Division I-97 

Working-Storage  Section  11-11 

The  data  description  entry 11-12 

The  BLANK  WHEN  ZERO  clause 11-14 

The  data -name  or  FILLER  clause 11-15 

The  JUSTIFIED  clause  (may  be  abbreviated  JUST) II-I6 

Level-number 11-17 

01  through  10  (level  numbers  must  be  2 digits)  . . . II- 13 

77 11-11 

The  PICTURE  clause  (may  be  abbreviated  PIC) II- 1 8 

Character-string  may  contain  30  characters II- 1 8 

Data  characters:  AX9 II- 1 8 

Operational  symbols:  S V P 11-21 

Fixed  Insertion  characters 11-21 

0 (may  be  used  only  in  edited  items) 

f 

B (may  be  used  only  in  edited  items) 


$ (currency  sign) 

+ and  - 
DB  and  CR 
/ 

Replacement  or  floating  characters 11-21 

I (currency  sign) 

+ and  - 
Z 

« 


Currency  sign  substitution 11-21 

Decimal  point  substitution 11-21 

The  REDEFINES  clause  (may  not  be  nested) 11-27 

The  SIGN  clause 11-31 

The  SYNCHRONIZED  clause  (may  be  abbreviated  SYNC)  . . . 11-33 

The  USAGE  clause 11-35 

COMPUTATIONAL  (may  be  abbreviated  COMP) 

DISPLAY 

The  VALUE  clause 11-36 

literal 

Procedure  Division 1-99 

Conditional  expressions  ....  II-41 
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Simple  condition 11-41 

Relation  condition 11-41 


Relational  operators 
[NOT]  GREATER  THAN 
[NOT]  LESS  THAN 
[NOT]  EQUAL  TO 


Comparison  of  numeric  operands 11-42 

Comparison  of  nonnumeric  operands  (oper- 
ands must  be  of  equal  size) 11-42 

Class  condition 11-43 

NOT  option 

Switch-status  condition  11-44 

The  arithmetic  statements  11-51 

Arithmetic  operands  limited  to  18  digits 
Overlapping  operands 11-51 


The  ACCEPT  statement  (only  one  transfer  of  data).  . . . 11-53 
2.1.1  ERROR:  Accept  Statement 


The  ACCEPT  statement  failed  to  place  the  proper  data  in  a field 
with  a numeric  PICTURE  when  the  character-string  being  ACCEPTed 
was  longer  than  the  receiving  field  and  truncation  was  required 

(NC109.B.1) 


The  ADD  statement 11-55 

identifier/literal  series 
TO  identifier 
GIVING  identifier 
ROUNDED  phrase 
SIZE  ERROR  phrase 


The  ALTER  statement  (only  one  procedure-name)  11-57 

The  DISPLAY  statement  (only  one  transfer  of  data)  . . . 11-59 
The  DIVIDE  statement  11-61 


INTO  identifier 
BY  identifier/literal 
GIVING  identifier 
ROUNDED  phrase 
SIZE  ERROR  phrase 


The  ENTER  statement 11-63 

The  EXIT  statement 11-64 


The  GO  TO  statement  (procedure-name  la  required)  . . . 11-65 
DEPENDING  ON  phrase 

The  IF  statement  (statements  must  be  Imperative)  . . . 11-66 
ELSE  phrase 

The  INSPECT  statement  (only  single  character 

data  item) 11-68 


TALLYING  phrase 
ALL 

LEADING 
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CHARACTERS 
REPLACING  phrase 
ALL 

LEADING 

FIRST 

CHARACTERS 

TALLYING  and  REPLACING  phrases 

The  MOVE  statement  

TO  Identifier 
identifier  series 
The  MULTIPLY  statement  .... 
BY  identifier 
GIVING  identifier 
ROUNDED  phrase 
SIZE  ERROR  phrase 

The  PERFORM  statement  

procedure-name 
THRU  phrase 
TIMES  phrase 

The  STOP  statement  

literal 

RUN 

The  SUBTRACT  statement  .... 
Identifier/literal  series 
FROM  identifier 
GIVING  Identifier 
ROUNDED  phrase 
SIZE  ERROR  phrase 


I 


t 


11-74 

11-77 

11-78 

11-85 

11-89 
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2.2  Table  Handling  Level  1 
Language  Concepts 

User-defined  words I_76 

index-name 

Subscripting  - 3 levels I_89 

Indexing  - 3 levels I_89 

Data  Division 

The  OCCURS  clause III-2 

Integer  TIMES 

INDEXED  BY  index-name  series 

The  USAGE  IS  INDEX  clause III-5 

Procedure  Division 

Relation  conditions  III-6 

Comparisons  involving  index-names  and/or 
index  data  items 

Overlapping  operands III-6 

The  SET  statement Ill- 11 

index-name/ldentlfier  series 
index-name 

UP  BY  identifier/integer 
DOWN  BY  identifier/integer 
index-name  aeries 
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2.3  Sequential  I-O  Level  1 


Lai^guage  Concepts 

User-defined  words  1-76 

file-name 

record-name 

I-O  status IV- 1 

Environment  Division 

The  FILE-CONTROL  paragraph IV-i4 

The  file  control  entry IV-U 

SELECT  clause 


ASSIGN  TO  implementor-name  clause 
ORGANIZATION  IS  SEQUENTIAL  clause 
ACCESS  MODE  IS  SEQUENTIAL  clause 
FILE  STATUS  clause 

The  I-O-CONTROL  paragraph IV-6 

RERUN  clause 
SAME  AREA  clause 
SAME  AREA  series 

Data  Division 

File  Section IV-9 

2.3-1  ERROR:  File  Description  Entry 


A non-standard  clause  had  to  be  added  to  the  file  description 
of  a program  reading  a card  deck  as  part  of  the  ASCII 
validation.  The  record  length  had  to  be  Increased  by  one 
in  order  to  accept  the  card  images  as  80  character  records. 

(SO1 19. B) 


The  file  description  entry IV- 10 

The  record  description  entry  IV-9 

The  BLOCK  CONTAINS  clause IV- 11 

integer  CHARACTERS 
integer  RECORDS 

The  CODE-SET  clause IV- 12 

The  DATA  RECORDS  clause IV- 1 3 

data-name 
data-name  series 

The  LABEL  RECORDS  clause IV- 111 

STANDARD 

OMITTED 

The  RECORD  CONTAINS  clause  IV- 18 

Integer- 1 TO  lnteger-2  CHARACTERS 

The  VALUE  OF  clause IV- 19 

implementor-name  IS  literal 


implementor-name  IS  literal  series 
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Procedure  Division 

The  CLOSE  statement  (only  a single  file-name  may  appear 

in  a CLOSE  statement) IV-20 

REEL 

UNIT 

The  OPEN  statement  (only  a single  file-name  may  appear 

in  an  OPEN  statement).  IV-24 

INPUT 

OUTPUT 

I-O 

The  READ  statement IV-28 

INTO  identifier 
AT  END  phrase 

The  REWRITE  statement IV-31 

FROM  identifier 

The  USE  statement IV-32 

EXCEPTION/ERROR  PROCEDURE 
ON  file-name 
ON  INPUT 
ON  OUTPUT 
ON  I-O 

The  WRITE  statement IV-3** 

FROM  identifier 
BEFORE/AFTER  integer  LINES 
BEFORE/AFTER  PAGE 
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3.  SECTION  3.  COMPILER  STATUS 

3 . 1 Federal  Standard  COBOL 

Section  1.5  explains  the  four  levels  of  Federal  Standard  COBOL  and  their 
relation  to  American  National  Standard  COBOL.  This  section  lists  the  dis- 
crepancies described  in  Section  2 by  the  Federal  level  in  which  the  problem 
occurs.  All  errors  listed  for  a lower  level  are  also  errors  in  any  higher 
level,  even  though  they  are  listed  only  in  the  lower  level.  The  paragraph 
number  from  Section  2 is  used  to  reference  the  errors  in  each  Federal  level. 
When  the  subject  compiler  falls  to  support  an  entire  functional  module,  that 
error  indication  appears  in  upper  case  to  highlight  its  seriousness  in  compari- 
son with  other  errors  which  may  Involve  only  a particular  language  element  or 
facility. 

3.1.1  Low  Level 

2.1.1  ACCEPT  statement  Involving  truncation. 

2.3.1  FD  - modifications  required  to  read  ASCII  card  deck. 

3.1.2  Low- Intermediate  Level 

Validation  was  not  performed  at  this  level. 

3.1.3  High-Intermediate  Level 

Validation  was  not  performed  at  this  level. 

3.1.4  High  Level 

Validation  was  not  performed  at  this  level. 


3.2  Federal  Standard  COBOL  Flagging 

A requirement  of  Federal  Standard  COBOL  is  that  the  COBOL  implementation  include 
a facility  for  flagging  COBOL  elements  vrtiich  do  not  conform  to  a specified  level 
of  Federal  Standard  COBOL.  This  section  lists  the  flagging  discrepancies 
described  in  Section  2 by  Federal  COBOL  level. 

This  compiler  does  not  include  the  required  flagging  facility. 
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3.3  American  National  Standard  COBOL 

Full  American  National  Standard  COBOL  consists  of  the  entire  set  of  language 
elements  defined  in  the  ANSI  COBOL  standard  (refer  to  1.7).  It  is  also  the 
equivalent  of  high  level  Federal  Standard  COBOL  plus  the  Report  Writer  module.  | 

Therefore,  this  section  lists  only  those  discrepancies  found  while  validating  j 

the  Report  Writer  Module. 

This  Implementation  does  not  include  a Report  Writer  module. 
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4.  SECTION  4.  SOFTWARE  ENVIRONMENT 

The  compiler  referenced  In  this  document  was  validated  using  the  software 
environment  described  In  this  section.  When  using  a modification  of  the 
described  environment,  the  compiler  may  or  may  not  continue  to  conform  to  the 
Standard.  It  should  be  noted  that  during  the  validation  process,  an  attempt  la 
made  to  validate  as  many  different  options  as  possible. 

The  use  of  compiler  options.  Implementor-names  In  the  Envlroiunent  Division 
and  any  form  of  optimization  which  Is  not  described  In  this  report  could  cause 
the  compiler  to  produce  a program  that  does  not  perform  according  to  the 
specifications  of  Standard  COBOL.  Only  the  environment  described  In  this 
document  has  been  used  with  this  compiler  to  satisfy  the  requirements  of  FIPS 
PUB  21-1  and  FPMR  101-32. 1305 . la.  (Any  deviations  which  must  be  corrected  as 
per  the  referenced  FPMR  are  described  In  Sections  2 and  3 of  this  report.) 

4.1  Compiler  options  used 

Options  specified: 

L (list  source  file) 

C (source  Is  In  card  format) 

Option  defaulted: 

Omit  address  map  (no  A option) 

Omit  debugger  (no  D) 

Do  not  compile  extensions  (no  E) 

Omit  machine  code  listing  (no  G) 

Omit  data  and  procedure  storage  maps  (no  M) 

Generate  object  file  (no  P) 

Give  complete  compilation  (no  Q) 

Omit  statistics  (no  S) 

Omit  virtual  segmentation  (no  V) 

List  warning  messages  (no  W) 

Omit  cross  reference  listing  (no  X) 


4.2  Environment  Division  Implementor-names 


Printer  destined  files 
PRINTER  "«LIST" 

Tape  Files 


"llnkname: flle-ld" 
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Sequential  I-O  Mass-storage  files 
"dlsk-flle-ld" 

Switch  names 

SWITCH  "A" 

SWITCH  "B" 

Source  Computer  name 
ECLIPSE 

Object  Computer  name 
ECLIPSE 

4.3  Optimization 

The  compiler  may  or  may  not  have  optimization  features.  If  optimization  is 
available  by  option,  It  was  used  during  the  validation  process  (during  a 
separate  execution  of  the  Compiler  Validation  System)  to  determine  if  Its  use 
causes  the  compiler  to  produce  a program  which  does  not  give  the  expected 
results.  If  the  optimization  Is  Invoked  through  the  compiler  call  statement 
then  It  is  mentioned  in  paragraph  1 above.  If  it  Is  Invoked  through  the 
Introduction  of  syntax  In  other  than  the  Data  and  Procedure  Divisions  of  the 
source  program  It  Is  shown  below.  Optimization  which  would  require  modification 
to  the  Data  and  Procedure  Divisions  Is  not  considered  In  this  report  in  that  It 
is  beyond  the  scope  of  the  use  of  standard  COBOL  and  the  validation  process. 

This  compiler  has  no  optimization  option. 


Compiler 

AOS  COBOL  Revision  2.00 

4.5  Operating  System 
AOS  Revision  2.03 

4.6  Other  Software  Support 

Other  system  software  released  with  this  revision  of  AOS  COBOL  and  the  AOS 
operating  system  includes  AOS  INFOS  Revision  2.02  and  AOS  SORT  Revision  2.02. 
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5.  SECTION  5.  ASCII  VALIDATION 
5.1  Purpose  of  ASCII  Validatioti 

The  ASCII  Validation  Is  performed  by  running  a sequence  of  three  CCMSl^ 
programs  (SQ118,  SQ119»  SQ120)  using  special  procedures.  The  purpose  of  this 
special  run  Is  to  validate  that  the  compiler/operating  system  being  tested  Is 
capable  of  processing  ASCII  code  represented  on  magnetic  tape  and  punched  cards 
that  were  produced  (in  accordance  with  the  appropriate  Ameri».in  National 
Standard)  by  another  system.  There  Is  also  a magnetic  tape  and  a card  file 
created  during  the  validation  which  will  be  taken  to  another  system  for  further 
processing.  The  purpose  is  to  determine  whether  the  compiler/operating  system 
being  tested  can  also  produce  ASCII  representation  on  magnetic  tape  and  punched 
cards  which  can  be  processed  by  a another  computer  system. 


5.2  Applicable  ANSI  Standards 

The  ASCII  Validation  Is  based  on  several  American  National  Standards  and 
presumes  their  support  by  the  compiler /operating  system  being  validated.  These 
are: 


1.  American  National  Standard  Programming  Language 
COBOL  X3. 23- 19711. 

- The  CODE-SET  clause  Is  used  to  read  and  write 
the  ASCII  flies. 

- The  PROGRAM  COLLATING  SEQUENCE  clause  is  used  to 
process  the  data  In  ASCII  mode  as  well  as  native 
mode. 

- The  SIGN ...  SEPARATE  clause  is  used  for  signed 
data  and  all  data  is  In  the  DISPLAY  (character) 
mode. 

2.  American  National  Standard  Code  for  Information 

Interchange  (ASCII)  X3. *1-1 977-  (Note  that  this 

describes  the  code,  not  the  labeling  and  tape 
recording  formats.) 

3.  American  National  Standard  Hollerith  Punched  Card 
Code,  X3. 26- 1970. 

4.  American  National  Standard  Magnetic  Tape  Labels  for 
Information  Interchange,  X3.27-1977. 

5.  American  National  Standard  Recorded  Magnetic  Tape 
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for  Information  Interchange  (800  CPI,  NZRI), 

X3. 22-1973. 

6.  American  National  Standard  Recorded  Magnetic  Tape 

for  Information  Interchange  (1600  CPI,  PE), 

X?. 39-1973. 

7.  American  National  Standard  Recorded  Magnetic  Tape 

for  Information  Interchange  (6250  CPI,  Group 

Coded  Recording),  X3. 54-1976. 

The  language  of  the  1974  COBOL  Standard  provides  the  capability  to  accept, 
process,  and  produce  ASCII  code.  The  ASCII  Standard  describes  the  code  Insofar 
as  the  bit  arrangement  and  configuration,  but  does  not  address  recording  tech- 
niques, record  formats  or  any  labeling  scheme.  The  800  CPI,  NZRI  magnetic  tape 
recording  standard  was  used  to  establish  the  recording  density  and  techniques. 
(1600  CPI,  PE  based  on  X3. 39-1973  "Recorded  Magnetic  Tape  for  Information  Inter- 
change" could  be  used  under  special  arrangements.)  The  tape  labeling  scheme 
used  In  these  tests  is  based  on  X3. 27-1969  but  is  also  compatible  with  the 
revision  to  that  tape  label  standard.  Only  the  V0L1,  H0R1,  and  E0P1  labels  are 
used.  The  records  are  fixed  length  and  unblocked. 


5.3  ASCII  Validation  Process 

During  the  validation,  the  Validation  Manager  for  the  Federal  COBOL  Com- 
piler Testing  Service  uses  the  ASCII-encoded  magnetic  tape  and  card  files  In 
addition  to  the  normal  tape  files  associated  with  a validation.  For  the  ASCII 
portion  of  the  validation  the  following  steps  are  performed; 

1.  The  tape  file  and  card  deck  (produced  on  another  computer 
system)  are  used  as  Input  to  several  programs  designed  to 
validate  whether  the  system  being  validated  can  accept  and 
process  the  data  as  defined  by  the  respective  standards.  Any 
changes  made  during  this  validation  to  the  source  programs 
reading  the  data  are  noted  below  In  5.4.1. 

2.  A tape  file  and  card  file  are  produced  during  the  validation 
which  should  prove  to  be  identical  to  the  files  described  In 
1 above.  These  two  files  are  then  processed  on  a different 
computer  system  to  determine  the  degree  to  which  the  system 
being  validated  supports  the  ASCII  standard.  Any  changes 
made  during  this  validation  to  the  source  program  producing 
the  data  are  noted  below  In  5.4.2. 


1 
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5.4  Results  for  This  Validation 

1.  In  order  for  the  program  to  be  able  to  read  the  supplied  card 
deck,  it  was  necessary  to  modify  the  source  programs. 

(a)  A non-standard  clause: 

RECORDING  MODE  IS  DATA-SENSITIVE  RECORD  LENGTH  IS  8l 

was  added  to  the  File  Description  (FD)  for  the  card 
file. 

(b)  The  record  description  had  to  be  modified  by  adding: 

02  FILLER  PICTURE  X. 

to  the  end  of  the  record,  thus  Increasing  the  record 
size  to  8l  characters. 

The  system  requires  this  additional  character  position  in  the 
record  description  entry  in  order  to  handle  a delimiter 
character  that  it  uses  at  the  end  of  each  card  image  record. 
This  delimiter  should  have  been  transparent  to  the  user. 

The  subject  system  was  able  to  handle  the  unlabeled  tape  but 
"could  not  find"  the  ANSI  labeled  tape.  It  was  presumed  that 
the  problem  resulted  from  the  use  of  embedded  space 
characters  in  the  file-identifier  field  contained  in  the  HDR1 
label  on  the  foreign  tape. 


2.  Since  the  subject  system  does  not  support  a card  punch,  no 
card  deck  could  be  punched  and  checked.  However,  the  system 
was  able  to  produce  both  an  ANSI  labeled  tape  and  an 
unlabeled  tape.  Each  was  subsequently  checked  and  found  to 
be  correct  in  format  and  content.  No  modifications  to  the 
source  programs  were  required. 
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A.  APPENDIX  A.  VALIDATION  SUMMARY  REPORT  WORKING  DOCUMENT 

This  appendix  Is  a working  paper  produced  during  the  validation  and  documents 
the  results  of  the  compilation  and  execution  of  each  of  the  progreuns  comprising 
the  CCVS.  The  results  contained  herein  are  baaed  on  the  use  of  the  compiler 
within  the  Validation  Envlroiuaent  Identified  In  this  appendix.  This  appendix 
(Validation  Suauary  Working  Document)  Is  not  part  of  the  official  Validation 
Sianary  Report  (VSR)  and  Is  not  Intended  to  reflect  In  any  way  the  compiler's 
usefulness  or  degree  of  conformance  to  the  language  specifications. 

The  reader  of  this  appendix  should  keep  In  mind  that  the  same  problem 
area  may  appear  In  more  than  one  program,  but  Is  considered  only  as  one  single 
discrepancy  and  as  such  la  reflected  only  once  In  the  body  of  the  VSR.  (The  VSR 
will  In  turn  only  reference  the  first  occurrence  of  the  problem  In  the 
appendix. ) 

The  reference  documents  for  COBOL  are  American  National  Standard 
Programming  Language  COBOL  (X3. 23-197**) i and  Federal  Standard  COBOL  (FIPS  PUB 
21-1). 


A.l  Validation  Environment 
COMPILER  IDENTIFICATION: 
COMPUTER  SYSTEM: 

OPERATING  SYSTEM: 


AOS  COBOL  Revision  2.00 
Data  General  ECLIPSE  C350 
AOS  Revision  2.03 


1 

; 
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A. 2 Run  Sununaries 
NUCLEUS  MODULE 


Nucleus  Level  1 


HC101  through  NCIO8 
A.  Conpilatlon. 


No  errors 


B.  Execution. 


No  errors 


NCI  09 


A.  Compilation. 

No  errors 

B.  Execution. 

(1)  ACCEPT-TEST-7  failed.  This  test  ACCEPTS  the  10-character 
string  "0123456789"  Into  a field  PICTUREd  "9(9)".  The 
resultant  value  in  the  field  is  expected  to  be  012345678 
(right-end  truncation).  The  Data  General  implementation  treats 
the  operation  numerically,  forces  a decimal  point  alignment, 
and  stores  the  result  as  123456789.  This  treatment  of  the  data 
is  documented  in  the  Data  General  COBOL  manual  as  the  desired 
procedure,  and  la  acknowledged  there  as  an  extension  to  ANSI 
standard  COBOL. 

(2)  NCIO9  outputs  a number  of  messages  via  DISPLAY  statements. 
It  also  requests  early  operator  termination  of  the  program  via 
"STOP  literal"  statement.  It  was  found  that  when  the  program 
was  aborted,  the  last  DISPLAY  message  was  lost  because  it  still 
remained  in  a system  buffer  and  was  not  sent  on  to  the  printer. 
However,  if  the  execution  was  permitted  to  proceed,  all  DISPLAY 
messages  appeared.  The  standard  does  not  prescribe  the  action 
to  be  taken  regarding  the  contents  of  system  buffers  if  a 
program  is  aborted  by  the  operator. 
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NCIIO  through  NC120 

A.  Coapllatlon. 
No  errors 

B.  Execution. 

No  errors 

NC1f>l  through  NC165 

A.  Compilation. 
No  errors 

B.  Execution. 


No  errors 
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SEQUENTIAL  I-O  MODULE 
Sequential  I-O  Level  1 


SQ101 

A.  Compilation. 

No  errors. 

B.  Execution. 

SQ101  checks  vertical  spacing  effected  by  the  WRITE  ... 
ADVANCING  . . . statement . Before  the  printed  output  from  the 
program  could  be  produced  in  the  correct  format,  the  system 
Forms  Control  Utility  (FCU)  had  to  be  invoked  to  reprogram  the 
printer's  vertical  forma  unit.  The  top  of  the  page  had  to  be 
set  at  line  1 (nominally  it  is  line  4),  and  the  bottom  of  the 
page  had  to  be  set  at  line  66  (its  default  value),  thus 
indicating  that  each  of  the  66  lines  on  the  printer  form  was 
subject  to  use. 


SQ102  through  SQ118 

A.  Compilation. 

No  errors 

B.  Execution. 

No  errors 

Sqi19  and  SQ120 

A.  Compilation. 

No  Errors 

B.  Execution. 

Two  modifications  were  made  to  SQ119  in  order  to  correctly 
process  the  card  deck  associated  with  the  ASCII  validation.  No 
changes  should  have  been  necessary. 

The  non-standard  clause: 
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RECORDING  MODE  IS  DATA-SENSITIVE  RECORD  LENGTH  IS  81 

was  added  to  the  FD  and  the  Record  length  had  to  be  increased 
by  one  character  (02  FILLER  PIC  X( 1)  added  to  the  record 
description)  In  order  to  process  the  data  correctly. 


SQ121 

A.  Compilation. 
No  errors 

B.  Execution. 

No  errors 

SQ151  through  SQ153 

A.  Compilation. 
No  errors 

B.  Execution. 


No  errors 
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TABLE  HANDLING  MODULE 
Table  Handlltig  Level  1 

TH101  through  TH1I1 

A.  Compilation. 

No  errors 

B.  Execution. 

No  errors 

TH151  and  TH152 

A.  Compilation. 

No  errors 

B.  Execution.. 


No  errors 
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This  compiler  can  only  handle  binary  (COHPUTATIONAL)  fields  of 
16  digits  or  less.  COMPUTATIONAL  Items  of  longer  lengths  are 
handled  internally  as  "C0MP0TATI0MAL-3"t  ® pack^iid  decimal 
format . 


A warning  message 


WARNING:  BINARY  (COMP)  ITEMS  GREATER  THAN  16  DIGITS  HANDLED  AS 
COMP-3 


flagged  fields  beyond  that  limitation  In  the  following  pro 
grams: 


NC101,  NC103,  NC105,  NC106,  NC117,  NC118,  NC119,  NC120,  NC153 

NC154,  NC155,  NCI56,  NC163,  NC164,  NCI65,  TH102,  TH104,  TH151 


No  Errors  resulted 


